unit OrderEntry;

interface

uses System.SysUtils, Order;

type
  TOrderEntry = class(TInterfacedObject)
  private
    FConnectionString: string;
    FTimeout: Integer;
  public
    function EnterOrderIntoDatabase(aOrder: TOrder): Boolean;
  end;

implementation

{ TOrderEntry }

uses Spring.XE.Utils;

function TOrderEntry.EnterOrderIntoDatabase(aOrder: TOrder): Boolean;
begin
  Result := aOrder <> nil;

  WriteLn('Entering order into the database....' + FConnectionString + '  ' + IntToStr(FTimeout));
end;

initialization
  TSpringXEUtils.TryRegisterClass(TOrderEntry);

end.
